home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / batchut / enqr_25.zip / enq-num.bat < prev    next >
DOS Batch File  |  1994-05-19  |  630b  |  33 lines

  1. @echo off
  2.  
  3. rem Demonstrates using numeric input of Enquire
  4.  
  5. :start
  6. echo The tastiest flavor of ice cream is:
  7. echo     1. vanilla    3. rocky road
  8. echo     2. chocolate  4. pistachio
  9. enquire -# -l "\n\rPick a flavor: "
  10. if errorlevel 5 goto start
  11. if errorlevel 4 goto pista
  12. if errorlevel 3 goto rockroad
  13. if errorlevel 2 goto choco
  14. if errorlevel 1 goto vani
  15. goto start
  16.  
  17. :vani
  18. enquire -z "\nNot very creative, are you?\n\r"
  19. goto exit
  20.  
  21. :choco
  22. enquire -z "\nDoesn\'t everybody like chocolate?\n\r"
  23. goto exit
  24.  
  25. :rockroad
  26. enquire -z "\nDaring, eh?\n\r"
  27. goto exit
  28.  
  29. :pista
  30. enquire -z "\n*chuckle*\n\r"
  31.  
  32. :exit
  33.